﻿
Partial Class InsertLogin
    Inherits System.Web.UI.Page

    Protected Sub btnSubmit_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSubmit.Click
        Dim db As New DatabaseCommon()
        Dim ht As New Hashtable

        ht.Add("@UserName", Me.txtName.Text)
        ht.Add("@UserPassword", txtPassword.Text)
        ht.Add("@UserEmail", txtEmail.Text)

        db.ExecuteProcedure("sp_CreateUser", ht)

        Response.Redirect("http://localhost:1042/LogIn/default.aspx")

    End Sub

End Class
